Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/a_utils/ffccflow/ffccflow.lha/ffccc+flow/flow/make_vms.com

Text File | 1992-07-31 | 521b | 21 lines

$! This procedure creates FLOW.EXE from its component Fortran
$! source files.
$! It assumes it is being executed in a dedicated [.flow] subdirectory.
$loop1:
$ file = f$search("*.for")
$ if file .eqs. "" then goto end_loop1
$ fortran 'file
$ goto loop1
$end_loop1:
$ library/create flow.olb
$loop2:
$ file = f$search("*.obj")
$ if file .eqs. "" then goto end_loop2
$ library/insert flow 'file
$ goto loop2
$end_loop2:
$ library/delete=flow flow
$ link/exe=flow.exe vmsflow,flow/lib
$ write sys$output "Finished."
$ exit